#!/usr/bin/perl
use strict;
use warnings;

my $path = "repo/kernal/usman/";
$path = $1 if($path=~/(.*)\/$/);
print "$path\n";
